home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / MATHS / RLAB / RLAB125.ZIP / !RLaB / rlib / clearall < prev    next >
Text File  |  1994-09-20  |  767b  |  32 lines
  1. //-------------------------------------------------------------------//
  2.  
  3. // Synopsis:    Clear all the variables from the workspace.
  4.  
  5. //  Syntax:    clearall ( )
  6.  
  7. //  Description:
  8.  
  9. //  The function clearall, clears all data objects from the workspace.
  10. //  Scalars, strings, matrices, and lists are cleared with the clear
  11. //  function. User function are not affected by clearall. If you wish
  12. //  to remove user functions you must do so explicitly with clear.
  13. //
  14.  
  15. //  See Also: clear
  16. //-------------------------------------------------------------------//
  17.  
  18.  
  19. clearall = function ( )
  20. {
  21.   for (i in members ($$))
  22.   {
  23.     if (class ($$.[i]) != "function")
  24.     {
  25.       if (i != "pi" && i != "eps" && i != "_rlab_search_path") 
  26.       {
  27.         clear ($$.[i]);
  28.       }
  29.     }
  30.   }
  31. };
  32.